home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 February / EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso / earcd / ear / listatie4.lha / DIDATTICA-1-BOXQ2.TXT < prev   
Text File  |  1996-01-11  |  880b  |  47 lines
  1.  
  2.          - Riquadro 2 -
  3.  
  4.  
  5. /*
  6. *
  7. * Stralcio dell'output del
  8. * compilatore relativo al
  9. * piccolo programma di prova
  10. * per testare il comportamento del
  11. * compilatore con le liste nelle
  12. * quali siano presenti elementi
  13. * modificati in run-time.
  14. *
  15. * Come al solito i numeri di
  16. * linea sono stati da noi inseriti
  17. * a puro scopo didattico.
  18. *
  19. */
  20.  
  21.  
  22. 1   MOVEQ          #$5,D0
  23. 2   MOVE.L         D0,-$C(A5)
  24.  
  25. 3   LEA            L7(PC),A0
  26. 4   MOVE.L         A0,D0
  27. 5   BRA.L          L10
  28. L6: DC.W           $3
  29. L7: DC.L           $1
  30. 8   DC.L           $2
  31. 9   DC.L           $3
  32. L10:MOVE.L         D0,-$4(A5)
  33.  
  34. 11  MOVE.L         -$C(A5),D0
  35. 12  MOVE.L         D0,-(SP)
  36.  
  37. 13  LEA            L17(PC),A0
  38. 14  MOVE.L         A0,D0
  39. 15  BRA.L          L20
  40. L16:DC.W           $3
  41. L17:DC.L           $1
  42. 18  DC.L           $2
  43. 19  DC.L           $0
  44. L20:MOVE.L         (SP)+,$8(A0)
  45. 22  MOVE.L         D0,-$8(A5)
  46.  
  47.